home *** CD-ROM | disk | FTP | other *** search
/ ETO Development Tools 4 / ETO Development Tools 4.iso / Essentials / MacApp Documentation / MacApp.TECH$ Archives / 1990 / Jun 90 / MacApp.Tech$ 6⁄1⁄90 / 1377-Re TPopup menu handl-May90 < prev    next >
Encoding:
Text File  |  1991-03-06  |  643 b   |  29 lines  |  [TEXT/GEOL]
  1. Item    0377612                         30-May-90        06:40PDT
  2.  
  3. From:   CDA0220                         DEV Bell Northern Resrch,B Papp,IDV
  4.  
  5. To:     PILLAR.CORP                     Pillar, Chris Ovard,PRT
  6.  
  7. cc:     MACAPP.TECH$                    MacApp Technical
  8.  
  9. Sub:    Re: TPopup menu handles
  10.  
  11. I hope this has been fixed for 2.0; I reported it last August.
  12.  
  13. I use this OVERRIDE:
  14.  
  15. PROCEDURE TBugFixedPopup.ReleasePopup; OVERRIDE;
  16.  
  17.    BEGIN
  18.    IF fMenuHandle <> NIL THEN BEGIN
  19.    DisposHandle(handle(fMenuHandle));
  20.    fMenuHandle := NIL;
  21.    END;
  22.    INHERITED ReleasePopup;
  23.    END;
  24.  
  25. Gordon Eastman
  26. Bell-Northern Research
  27. CDA0220
  28.  
  29.